----  MESSAGGIO FATTURE NON PAGATE PRIMA BOLLETTAZIONE CON INCASSI NON COMUNICATI DA PPTT __
insert into lux_fattura
select  '01','V',to_date (^DATA_FATTURAZIONE gg/mm/aaaa;A;ALFANUMERICO;1^^,'dd/mm/yyyy') dt_fat,
'',
'LU',
substr(^DATA_FATTURAZIONE gg/mm/aaaa;A;ALFANUMERICO;1^^,7,4) as  anno_fattura,
'',
f.sog_id,f.nome,'','','','','','','','','',
concat(concat(concat('CI RISULTA NON PAGATA LA FATTURA del ',f.dt_fat), ' Importo '),f.tot_fat) descriz,

'','','','','','','',
'','','','','',LUX_KEY_GEN.nextval,f.id_domICILIAZIONE
from (
select distinct f.sog_id,f.anno_fat,f.num_fat,f.tot_fat,i.sog_id inc_sog,f.dt_fat,f.nome,f.protocollo,f.id_domICILIAZIONE
from lux_fattura f,lux_incasso i,lux_contratto co
where i.anno_fat(+)=f.anno_fat 
and   f.az_id=f.az_id
and i.num_fat(+)= f.NUM_FAT
and f.DT_FAT < to_date ('01102009','ddmmyyyy')
and f.tipo_riga = 'T'
and co.sog_id = f.sog_id
and co.DT_FINE= to_date ('31129999','ddmmyyyy')   ) f
where inc_sog is null
and f.sog_id = (select distinct sog_id from  lux_fattura f1
where f1.tipo_riga= 'V' 
and f1.dt_fat=to_date (^DATA_FATTURAZIONE gg/mm/aaaa;A;ALFANUMERICO;1^^,'dd/mm/yyyy')
and f.sog_id=f1.sog_id)